PROCESS iniciar_juego();
// bucle principal del juego. maneja los cambios entre las secciones del juego.
// Se ejecuta constantemente

BEGIN

	LOOP	// bucle principal del juego
	
		// salida de emergencia :D
		if ( key ( _esc ) and modo_debug)
			exit();
		end
		
		// enciende y apaga el modo editor
		if ( key ( _f1 ) and modo_editor == false )
			modo_editor = true;
		end
		if ( key ( _f2 ) and modo_editor)
			modo_editor = false;
		end
		
		// Intercambia entre durezas y tiles
		if ( key ( _y ) )
			editor_durezas = true;
		end
		if ( key ( _u ) )
			editor_durezas = false;
		end
		
		// secciones principales del juego
		if ( seccion_cambio )
		
			switch (seccion)
			
				// intro del juego, apenas inicia
				case intro:
				
					seccion_cambio = false;
				
					//intro();
					
				end
				
				// menu principal
				case menu:
				
					seccion_cambio = false;
				
					iniciar_menu();
					
					
				end
				
				// modo juego en si
				case juego:
				
					seccion_cambio = false;
					
					unidades_fpg = load_fpg ("fpg/unidades.fpg");
	
					scroll_cursor();
					
					editor_ayuda();
					
					UnidadSeleccionable(1,8);
					UnidadSeleccionable(4,3);
					UnidadSeleccionable(12,7);
					UnidadSeleccionable(18,14);
					
					// llamar este proceso al final da mejor resultado :O
					control_tiles();
					
				end
				
			end
			
		end
	
		frame;
		
	END

END
